home *** CD-ROM | disk | FTP | other *** search
CLISP byte-compiled Lisp program | 1993-06-05 | 1.9 KB | 40 lines |
- (SYSTEM::VERSION '(SYSTEM::CLISP2 14. LISP:T 210292.))
- #Y(#:TOP-LEVEL-FORM-1 #13Y(00 00 00 00 00 01 D4 36 02 30 07 19 01) "LISP")
- #Y(#:TOP-LEVEL-FORM-2 #13Y(00 00 00 00 00 01 D4 D5 31 00 17 19 01)
- #.#'FMAKUNBOUND
- (MACHINE-TYPE MACHINE-VERSION MACHINE-INSTANCE SHORT-SITE-NAME
- LONG-SITE-NAME EDITOR-TEMPFILE
- ))
- #Y(#:TOP-LEVEL-FORM-3 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- MACHINE-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(MACHINE-TYPE #9Y(00 00 00 00 00 01 BE 19 01) "Atari ST")
- )
- #Y(#:TOP-LEVEL-FORM-4 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- MACHINE-VERSION SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(MACHINE-VERSION #9Y(00 00 00 00 00 01 BE 19 01) "Mega ST 4")
- )
- #Y(#:TOP-LEVEL-FORM-5 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- MACHINE-INSTANCE SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(MACHINE-INSTANCE #9Y(00 00 00 00 00 01 BE 19 01)
- "Instituts-Maschine Math. Institut II"
- ) )
- #Y(#:TOP-LEVEL-FORM-6 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- SHORT-SITE-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(SHORT-SITE-NAME #9Y(00 00 00 00 00 01 BE 19 01) "Karlsruhe")
- )
- #Y(#:TOP-LEVEL-FORM-7 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- LONG-SITE-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(LONG-SITE-NAME #9Y(00 00 00 00 00 01 BE 19 01)
- "Zimmer 320, Mathe-Bau, Universität Karlsruhe, W7500 Karlsruhe 1, Deutschland"
- ) )
- #Y(#:TOP-LEVEL-FORM-8 #16Y(00 00 00 00 00 01 D4 2F 5F D5 D6 2F 56 BF 19 01)
- (SPECIAL *EDITOR*) *EDITOR* "E:\\LISP\\TEMPUS.PRG"
- )
- #Y(#:TOP-LEVEL-FORM-9 #16Y(00 00 00 00 00 01 D4 2D 01 D4 D6 30 96 BE 19 01)
- EDITOR-TEMPFILE SYSTEM::REMOVE-OLD-DEFINITIONS
- #Y(EDITOR-TEMPFILE #9Y(00 00 00 00 00 01 BE 19 01) "LISPTEMP.LSP")
- )
- #Y(#:TOP-LEVEL-FORM-10 #16Y(00 00 00 00 00 01 D4 2F 5F D5 D6 2F 56 BF 19 01)
- (SPECIAL *LOAD-PATHS*) *LOAD-PATHS*
- (#"E:\\LISP\\...\\" #"A:" #"A:\\" #"A:\\...\\")
- )